
option explicit

' ------------------------------------------------------------------------------
' ------------------------------------------------------------------------------
' --- Quebla - View Group Library - Version 1.0.0
' --- Autor:    Sardi, Leandro Daniel
' --- Mail:     lsardi@quebla.com.ar
' --- Fecha:    2006/06/05
' ---
' --- Copyright Quebla (c). Todos los derechos reservados
' ---

class CGroupHnd

    private m_oColumnHnd


    public property get oColumnHnd()
        set oColumnHnd = m_oColumnHnd
    end property

    public property set oColumnHnd(byval o)
        set m_oColumnHnd = o
    end property

    public function GetExpresion()
        dim sRes
        
        sRes = m_oColumnHnd.sExpresionForGroup()
        
        GetExpresion = sRes
    end function

end class
